home *** CD-ROM | disk | FTP | other *** search
/ Aminet 22 / Aminet 22 (1997)(GTI - Schatztruhe)[!][Dec 1997].iso / Aminet / game / actio / Vermone2.lha / vermone2 / Vermone2_Installer < prev    next >
Text File  |  1997-04-29  |  3KB  |  165 lines

  1. ; VERMONE 2 Installer script
  2. ; $VER VERMONE 2 Install 1.0
  3. ; written by HIT MAN
  4.  
  5.  
  6.  
  7. (set #vermone2-location
  8. (cat "WARNING!\nIf you have an old version of VERMONE 2, delete it "
  9.   "before to install this version\nNote! This game, WITHOUT the Custom SFX "
  10.   "can be installed even on a single disk"
  11.   "\nWhich Drive Did You Install To"
  12. ))
  13.  
  14. (set #icone-install
  15. (cat "\nDo you have installed MagicWB?"
  16. ))
  17.  
  18. (set #custom-install
  19. (cat "\n Do you want install the Custom SFX?"
  20. ))
  21.  
  22.  
  23.  
  24. (set @new-dest
  25. (askdir
  26. (prompt #vermone2-location)
  27. (help @askdir-help)
  28. (default "SYS:")))
  29.  
  30. (makeassign "assigns" @new-dest)
  31. (if (exists "assigns:Vermone2") (
  32.   (message "Directory already exists!!!")
  33.   (exit (quiet)))
  34. )
  35.  
  36.  
  37. (makedir "assigns:Vermone2")
  38. (makedir "assigns:Vermone2/Docs")
  39. (makedir "assigns:Vermone2/GFX")
  40. (makedir "assigns:Vermone2/LEGFX")
  41. (makedir "assigns:Vermone2/CustomLevels")
  42. (makedir "assigns:Vermone2/CustomSFX")
  43. (makedir "assigns:Vermone2/OriginalLevels")
  44. (makedir "assigns:Vermone2/OriginalSFX")
  45. (makedir "assigns:Vermone2/Music")
  46.  
  47.  
  48. ; Hai il MagicWB installato?
  49. (
  50.   (set hardy
  51.     (askbool
  52.       (prompt #icone-install)
  53.       (help #help-askbool)
  54.     )
  55.   )
  56.  
  57.   (if (= hardy 1)
  58.     (
  59.       (copyfiles
  60.       (source "Icons")
  61.       (dest "assigns:Vermone2")
  62.       (all))
  63.     )
  64. ;else
  65.     (
  66.       (copyfiles
  67.       (source "LevelEditor.info")
  68.       (dest "assigns:Vermone2"))
  69.       (copyfiles
  70.       (source "Vermone2.info")
  71.       (dest "assigns:Vermone2"))
  72.     )
  73.  
  74.   )
  75. )
  76.  
  77.  
  78. ; Installo i Custom SFX
  79. (
  80.   (set hardy
  81.     (askbool
  82.       (prompt #custom-install)
  83.       (help #help-askbool)
  84.     )
  85.   )
  86.  
  87.   (if (= hardy 1)
  88.     (
  89.       (copyfiles
  90.       (source "CustomSFX")
  91.       (dest "assigns:Vermone2/CustomSFX")
  92.       (all))
  93.     )
  94.   )
  95. )
  96.  
  97.  
  98. (copyfiles
  99. (source "GFX/Dest.icon")
  100. (dest "assigns:"))
  101. (rename "assigns:Dest.icon" "assigns:Vermone2.info")
  102.  
  103. (copyfiles
  104. (source "Docs.info")
  105. (dest "assigns:Vermone2"))
  106.  
  107. (copyfiles
  108. (source "LevelEditor.exe")
  109. (dest "assigns:Vermone2"))
  110.  
  111. (copyfiles
  112. (source "Vermone2.exe")
  113. (dest "assigns:Vermone2"))
  114.  
  115. (copyfiles
  116. (source "LevelEditor")
  117. (dest "assigns:Vermone2"))
  118.  
  119. (copyfiles
  120. (source "Vermone2")
  121. (dest "assigns:Vermone2"))
  122.  
  123. (copyfiles
  124. (source "HighScore.V2")
  125. (dest "assigns:Vermone2"))
  126.  
  127. (copyfiles
  128. (source "Docs")
  129. (dest "assigns:Vermone2/Docs")
  130. (all))
  131.  
  132. (copyfiles
  133. (source "GFX")
  134. (dest "assigns:Vermone2/GFX")
  135. (all))
  136.  
  137. (copyfiles
  138. (source "LEGFX")
  139. (dest "assigns:Vermone2/LEGFX")
  140. (all))
  141.  
  142. (copyfiles
  143. (source "CustomLevels")
  144. (dest "assigns:Vermone2/CustomLevels")
  145. (all))
  146.  
  147. (copyfiles
  148. (source "OriginalLevels")
  149. (dest "assigns:Vermone2/OriginalLevels")
  150. (all))
  151.  
  152. (copyfiles
  153. (source "OriginalSFX")
  154. (dest "assigns:Vermone2/OriginalSFX")
  155. (all))
  156.  
  157. (copyfiles
  158. (source "Music")
  159. (dest "assigns:Vermone2/Music")
  160. (all))
  161.  
  162. (delete "assigns:Vermone2/GFX/Dest.icon")
  163.  
  164. (set @default-dest @new-dest)
  165.